home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 7
/
007.d81
/
about imml
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
36 lines
10 rem about imml & imml/demo
20 poke53281,0:poke53280,7:printchr$(14)
30 print"[147][158]"spc(14)"*** [201][205][205][204] ***":print" [215]ritten & [196]esigned by [196]oug [194]ruhn"
32 print
40 print"[152][156] [201][205][205][204] is a machine language routine ":print
50 print"that is designed to allow users to play":print
60 print"their own [194][193][195][203][199][210][207][213][206][196] music and/or ":print
70 print"sounds while their program continues to":print
80 print"execute.":print
90 print" [201][205][205][204]/[196][197][205][207] is a demonstration of this ":print
92 print"concept as well as the instructions.":print
100 print:
110 print" 1. [210][213][206] [201][205][205][204]/[196][197][205][207]"
112 print" 2. [204][207][193][196][160][201][205][205][204] [194][193][211][201][195][160][204][207][193][196][197][210]"
114 print" 3. [197][216][201][212][160][194][193][195][203][160][212][207][160][204][207][193][196][211][212][193][210]
116 [153]:[153]"(NULL)hich ?"
120 [151]198,0:[146]198,1:[161]a$
122 a[178][197](a$[170][199](0))
124 [139]a[179]1[176]a[177]3[167]120
126 [145] a [137] 200,300,400
128 :
200 [153]"loadload"[199](34)"imml/demo"[199](34)",8":[153]"run"
202 [151]631,13:[151]632,13:[151]198,2:[128]
250 :
300 [153]"load* * * right$(NULL)(NULL)(NULL)closepeekatn(NULL)right$lenclose(NULL)(NULL)atnstr$val(NULL)close * * *"
301 [153]"(NULL)his program will not return to (NULL)(NULL)atnstr$(NULL)(NULL)atn(NULL)"
302 [153]:[153]"atnre you sure you want to load it? (y/n)"
303 [161]k$:[139]k$[179][177]"y"[167][139]k$[179][177]"n"[167]303
304 [139]k$[178]"n"[167][138]
311 [153]"loadload"[199](34)"imml"[199](34)",8":[153]"list"
312 [151]631,13:[151]632,13:[151]198,2:[128]
350 :
400 [153]"loadload"[199](34)"hello"[199](34)",8":[153]"run"
402 [151]631,13:[151]632,13:[151]198,2:[128]
450 :